From: Richard M. Stallman Date: Sat, 29 May 1993 06:38:50 +0000 (+0000) Subject: Initial revision X-Git-Tag: archive/raspbian/1%29.2+1-2+rpi1^2~5^2~95809 X-Git-Url: https://dgit.raspbian.org/%22http:/www.example.com/cgi/%22https:/www.github.com/%22bookmarks:///%22http:/www.example.com/cgi/%22https:/www.github.com/%22bookmarks:/?a=commitdiff_plain;h=9ea6cb2830a7fe93bfe3517e034e048531a1c4c7;p=emacs.git Initial revision --- diff --git a/lisp/term/lk201.el b/lisp/term/lk201.el new file mode 100644 index 00000000000..3d7a2a02a89 --- /dev/null +++ b/lisp/term/lk201.el @@ -0,0 +1,21 @@ +(define-key function-key-map "\e[17~" [f6]) +(define-key function-key-map "\e[18~" [f7]) +(define-key function-key-map "\e[19~" [f8]) +(define-key function-key-map "\e[20~" [f9]) +(define-key function-key-map "\e[21~" [f10]) +(define-key function-key-map "\e[23~" [f11]) +(define-key function-key-map "\e[24~" [f12]) +(define-key function-key-map "\e[25~" [f13]) +(define-key function-key-map "\e[26~" [f14]) +(define-key function-key-map "\e[28~" [help]) +(define-key function-key-map "\e[29~" [do]) +(define-key function-key-map "\e[1~" [find]) +(define-key function-key-map "\e[2~" [insert]) +(define-key function-key-map "\e[3~" [remove]) +(define-key function-key-map "\e[4~" [select]) +(define-key function-key-map "\e[5~" [prior]) +(define-key function-key-map "\e[6~" [next]) +(define-key function-key-map "\e[31~" [f17]) +(define-key function-key-map "\e[32~" [f18]) +(define-key function-key-map "\e[33~" [f19]) +(define-key function-key-map "\e[34~" [f20])